﻿
Partial Class Interfaz_frmSistemaValoresBase
    Inherits System.Web.UI.Page
    Dim CL As New Logica.ModuloSistema.ControladorLogica


    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        CL = Logica.ModuloSistema.ControladorLogica.getInstance
        If CL.visibilidadesFormsInternos("Sistema", Session("user").ToString) = False Then
            Response.Redirect("Index.aspx")
        End If
    End Sub



End Class
